home *** CD-ROM | disk | FTP | other *** search
/ Computer Life 1997 February / Computer Life February 1997.iso / TELME / COMMS / MOBI5003.SRP < prev    next >
Encoding:
Text File  |  1996-06-05  |  1.6 KB  |  89 lines
  1. rem Copyright (c) PhoneLink plc 
  2. rem Ericsson - DC12 Data Card Using Cellnet Link (15/04/96)
  3.  
  4. label InitDevice
  5. echo off
  6. echo script[56]
  7. send    "at&fb29char(13)"
  8. timeout 2,modem_fail
  9. find    "OK"
  10. label OffToGate 
  11. rem Offline to Gate (also contains Pad to Gate)
  12. echo off
  13. echo script[52]..
  14. send    "atdt46551char(13)"
  15. timeout {DialTimeout},connect_fail
  16. finderr 0,BUSY,connect_fail
  17. finderr 0,NO CARRIER,connect_fail
  18. find    "CONNECT"
  19. label PadToGate
  20. echo off
  21. mwait 500
  22. send "char(13)"
  23. timeout 3,nua_bad1
  24. find "PAD>"
  25. flush
  26. echo script[53].
  27. send    "call {NUA}char(13)"
  28. timeout 3,nua_bad1
  29. finderr 0,COM,nua_good
  30. finderr 0,ERR,nua_bad1
  31. find    "ZZZ"
  32. label nua_bad1
  33. echo script[58]
  34. send    "call {NUA}char(13)"
  35. timeout 3,nua_bad2
  36. finderr 0,COM,nua_good
  37. find    "ZZZ"
  38. label nua_bad2
  39. echo script[58]
  40. send    "call {NUA}char(13)"
  41. timeout 3,nua_fail
  42. finderr 0,CLR,nua_fail
  43. finderr 0,UNAVAILABLE,nua_fail
  44. find    "COM"
  45. label nua_good
  46. echo script[54].
  47. end
  48.  
  49. label GateToPad
  50. echo off
  51. echo script[92].
  52. send    "char(16)"
  53. timeout 3,disconnect_fail
  54. find    "*"
  55. send "CLRchar(13)"
  56. timeout 3,disconnect_fail
  57. find "CLR"
  58. echo script[91]...
  59. end
  60.  
  61. label GateToOff
  62. rem Gate to Offline (also contains Pad to Offline)
  63. echo off
  64. label PadToOff
  65. echo off 
  66. dtrtoggle 1500
  67. echo script[99].
  68. end
  69.  
  70. label modem_offline
  71. dtrtoggle 1500
  72. abort
  73.  
  74. label modem_fail
  75. echo script[24].
  76. goto modem_offline
  77.  
  78. label connect_fail
  79. echo script[1].
  80. goto modem_offline
  81.  
  82. label nua_fail
  83. echo script[4].
  84. goto modem_offline
  85.  
  86. label disconnect_fail
  87. echo script[92].
  88. goto modem_offline
  89.